use "$admin_agg", clear

set scheme s2mono
 
twoway (line average_deposit week2, sort lpattern(solid)) (line average_withdrawal week2, sort lpattern(dash)) ///
	(line c_average_deposit week2, sort lpattern(dot)) (line c_average_withdrawal week2, sort lpattern( "-...")), ///
		xtitle(" ") ytitle(" ") ylabel(#6, angle(horizontal)) xlabel(2834 "July 2014" 2848 "Oct 2014" ///
		2865 "Feb 2015          ") legend(order(1 "MBA Deposits" 2 "MBA Withdrawals  " 3 " Control Deposits" 4 "Control Withdrawals")) graphregion(fcolor(white))	///	
		title(" ")

 
graph export "$output/graph_01_average_deposit_withdrawal.png", as(png) replace